home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 19 / CU Amiga Magazine's Super CD-ROM 19 (1998)(EMAP Images)(GB)[!][issue 1998-02].iso / CUCD / Programming / LEDA / source / src / graph / _ugraph.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-11-16  |  1.9 KB  |  83 lines
  1. /*******************************************************************************
  2. +
  3. +  LEDA  3.1c
  4. +
  5. +
  6. +  _ugraph.c
  7. +
  8. +
  9. +  Copyright (c) 1994  by  Max-Planck-Institut fuer Informatik
  10. +  Im Stadtwald, 6600 Saarbruecken, FRG     
  11. +  All rights reserved.
  12. + 
  13. *******************************************************************************/
  14.  
  15.  
  16.  
  17. #include <LEDA/ugraph.h>
  18.  
  19.  
  20. //------------------------------------------------------------------------------
  21. // undirected graphs 
  22. //------------------------------------------------------------------------------
  23.  
  24. void  ugraph::print_edge(edge e,ostream& o) const
  25. { o <<   "[" << e->s->name << "]==";
  26.   print_edge_entry(o,e->data[0]);
  27.   o << "==[" << e->t->name << "]";
  28.  }
  29.  
  30. // ugraph subgraph constructors:
  31.  
  32. ugraph::ugraph(ugraph& G, const list<node>& nl, const list<edge>& el)
  33. { // construct subugraph (nl,el) of ugraph G
  34.  
  35.   parent = &G;
  36.   node v,w;
  37.   edge e;
  38.  
  39.   node* N = new node[G.max_n_index+1];
  40.  
  41.   forall(v,nl)
  42.    { if (graph_of(v) != parent) 
  43.       error_handler(1,"ugraph: illegal node in subgraph constructor");
  44.      N[v->name] = new_node(v);
  45.     }
  46.  
  47.   forall(e,el)
  48.    { v = source(e);
  49.      w = target(e);
  50.      if ( graph_of(e)!= parent || N[v->name]==0 || N[w->name]==0 ) 
  51.       error_handler(1,"ugraph: illegal edge in subgraph constructor");
  52.      new_edge(N[v->name],N[w->name],e);
  53.     }
  54.  
  55.   delete N;
  56.  
  57.  }
  58.  
  59. ugraph::ugraph(ugraph& G, const list<edge>& el)
  60. { // construct subgraph of ugraph G with edgelist el 
  61.  
  62.   node  v,w;
  63.   edge  e;
  64.   node* N = new node[G.max_n_index+1];
  65.  
  66.   forall_nodes(v,G) N[v->name] = 0;
  67.  
  68.   parent = &G;
  69.  
  70.   forall(e,el)
  71.    { v = source(e);
  72.      w = target(e);
  73.      if (N[v->name] == 0) N[v->name] = new_node(v);
  74.      if (N[w->name] == 0) N[w->name] = new_node(w);
  75.      if ( graph_of(e) != parent )
  76.        error_handler(1,"ugraph: illegal edge in subgraph constructor");
  77.      new_edge(N[v->name],N[w->name],e);
  78.     }
  79.  
  80.   delete N;
  81.  
  82.  }
  83.